unit Game_Variables;

interface
uses class_Ship, class_Map;
var
  TestShip:TShip;
  TestMap:TMap;

implementation

procedure Test();
begin

end;

end.
